home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1999 March / EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso / earcd / devel / vbcc-68k-src / machines / amiga68k / libsrc / setjmp / setjmp.s
Text File  |  1999-01-01  |  347b  |  24 lines
  1. ;   davon bin ich nicht sehr ueberzeugt...
  2.  
  3.     xdef    _setjmp
  4.     section "CODE",code
  5. _setjmp
  6.     move.l  4(a7),a0
  7.     move.l  (a7),a1
  8.     move.l  a1,(a0)
  9.     movem.l d2-d7/a2-a7,4(a0)
  10.     clr.l   d0
  11.     rts
  12.  
  13.     xdef    _longjmp
  14. _longjmp
  15.     move.l  4(sp),a0
  16.     move.l  8(sp),d0
  17.     movem.l 4(a0),d2-d7/a2-a7
  18.     move.l  (a0),(a7)
  19.     rts
  20.  
  21.  
  22.  
  23.  
  24.